/**

This file is part of MaCI/GIMnet.

MaCI/GIMnet is free software: you can redistribute it and/or modify it 
under the terms of the GNU Lesser General Public License as published 
by the Free Software Foundation, either version 3 of the License, or 
(at your option) any later version.

MaCI/GIMnet is distributed in the hope that it will be useful, but WITHOUT 
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 
FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public 
License for more details.

You should have received a copy of the GNU Lesser General Public 
License along with GIMnet. (See COPYING.LESSER) If not, see 
<http://www.gnu.org/licenses/>.

**/
/**
 * \file
 * \brief Example client for the Image interface.
 * \author Antti Maula <antti.maula@tkk.fi>
 *
 * $Id: AudioClientExample.cpp,v 1.2 2009-12-01 09:33:06 morsko Exp $
 *
 */
#include <stdio.h>
#include <stdlib.h>
#include <signal.h>
#include <string>
#include <queue>
#include "AudioClient.hpp"
#include "ALSA.hpp"
//*****************************************************************************
// Include GIMI in proper way
#define GIMI_CLIENT_API (20000)
#include "gimi.h"
//*****************************************************************************
// Set initial verbosity level to 1
static int verbose = 1;
//*****************************************************************************
// Choose your namespace
using namespace MaCI::Audio;
//*****************************************************************************
// Running?
static volatile bool run = true;
static ownThreadHandle signalHandlerThread;

//*****************************************************************************
static std::string datasource;
static std::string datasourceMaCISL;
//*****************************************************************************
std::queue<MaCI::Audio::CAudioData *> iAudioBuffer;
ownMutexHandle iAudioBufferMutex; ///< Protect access to ReplyQueue
//*****************************************************************************
//*****************************************************************************
// Example for using the callback.
class CAudioClientCallbackExample : public MaCI::Audio::CAudioClientCallback
{

public:
  CAudioClientCallbackExample() {
  }

  ~CAudioClientCallbackExample() {
  }
protected:
  void OnAudioDataEvent(const CAudioData &aData, 
                        const unsigned int aDataSequence,
                        CAudioClient &aAudioClient) {
    ownMutex_Lock(iAudioBufferMutex);
    dPrint(10,"GotAudioData");
    CAudioData *data = new CAudioData(aData);

    iAudioBuffer.push(data);
    dPrint(1,"pushed data to container")
      ownMutex_Unlock(iAudioBufferMutex);
      
      

  }
};

//*****************************************************************************
//*****************************************************************************
static int SignalHandlerThread(void *)
{
  dPrint(8, "Signal handler thread (%ld) starting...", pthread_self());

  while (run) {
    // Now, wait for requested signals to arrive
    int sig;
    sigset_t mask;
    sigemptyset(&mask);
    sigaddset(&mask, SIGINT);
    sigaddset(&mask, SIGTERM);
    sigaddset(&mask, SIGPIPE);
    sigaddset(&mask, SIGHUP);
    sigwait(&mask, &sig);

    // Got signal, sigwait returned!
    dPrint(10,"Got Signal '%d' (%s)", sig, strsignal(sig));

    // What to do?
    switch(sig) {
    case SIGINT:
    case SIGTERM:
    case SIGPIPE:
    case SIGHUP:
      run = false;
      ownSleep_ms(1000);
      break;
      
    default:
      dPrint(1,"Unhandled signal! Ignore!");
      break;
    }
  }
  return 0;
}
//*****************************************************************************

static void InitSignalHandler(void)
{
  // Now; Set to BLOCK ALL SIGNALS
  sigset_t mask;
  sigemptyset(&mask);
  sigaddset(&mask, SIGINT);
  sigaddset(&mask, SIGTERM);
  sigaddset(&mask, SIGPIPE);
  sigaddset(&mask, SIGHUP);
  pthread_sigmask(SIG_BLOCK, &mask, NULL);
  
  // Start signal handler thread
  signalHandlerThread = ownThread_Create((void*)SignalHandlerThread, NULL);
}
//*****************************************************************************
//*****************************************************************************

/**
 * All MaCI modules should support these parameters with exactly these names
 * *** DO NOT CHANGE NOR DELETE ANY OF THEM ***
 * Howevery, feel free to add new parameters as you wish.
 */
static void showUsage()
{
  fprintf(stderr,"\n");
  fprintf(stderr,"Usage:\tImageClientExample [OPTIONS]\n");
  fprintf(stderr,"  [-u addr]\t\t\tUse 'addr' as GIMnet AccessPoints address\n");
  fprintf(stderr,"  [-p port]\t\t\tUse 'port' as GIMnet AccessPoints port\n");
  fprintf(stderr,"  [-n name]\t\t\tUse 'name' as this nodes GIMnet name\n");
  fprintf(stderr,"  [-s name]\t\t\tSpecify the data source\n");
  fprintf(stderr,"  \t\t\t\tOR\n");
  fprintf(stderr,"  [-S name]\t\t\tSpecify the data source by MaCISL\n\n");
  

  fprintf(stderr,"  [-v]\t\t\t\tIncrease verbosity by 1\n");
  fprintf(stderr,"  [-q]\t\t\t\tQuiet mode\n");
  fprintf(stderr, "\n\n");
}
//*****************************************************************************
//*****************************************************************************

static int ExecuteExampleClient(gimi::GIMI &g)
{
    dPrint(10,"gimi ptr %p, isconnected %d",&g,g.isConnected());
  iAudioBufferMutex = ownMutex_Init();
  using namespace MaCI::Audio;
  CAudioClientCallbackExample acce;
  CAudioClient ac(&g,0);
  TAudioInfo audioInfo;

  //  unsigned int seq = 0;
  // Assign default target.
  if (datasource.size()) {
    ac.SetDefaultTarget(datasource);

  } else {
    // GIMI is Open(), so we can execute this.
    ac.SetDefaultTarget(MaCI::MaCICtrl::SMaCISL(datasourceMaCISL),10000);

  }
  // Assign callback
  ac.SetAudioClientCallback(&acce);
  // Open.
  if (ac.Open() != MaCI::KMaCIOK) {
    dPrint(10,"Failed to open AudioClient. Exit.");
    return -1;
  }

  if(!ac.GetAudioInfo(audioInfo)){
    dPrint(1,"Failed to get audioInfo. EXIT");
    return -1;
  }
  //Open alsa 
  CAlsa alsa;
  dPrint(1,"Setting parameters to alsa frequency %u, number of channel %u, number of frames %u",
         audioInfo.frequency, audioInfo.numberOfChannels,audioInfo.numberOfFrames);
  alsa.SetParameters(audioInfo.frequency,
                     audioInfo.numberOfChannels,
                     EAudioFormatPCM16Bit,
                     EDataAccessRWInterleaved,
                     EDirectionPlayback,
                     audioInfo.numberOfFrames);
  //Open alsa driver
  if(alsa.Open()){
    dPrint(1,"Succesfully opened Alsa 2Driver.");
  }else{
    dPrint(1,"Failed to open Alsa2 driver.EXIT");
    return -1;
  }


  CAudioContainer *playingContainer = new CAudioContainer();
  dPrint(10,"%p", playingContainer->GetAudioDataPtr());

  while(run){
           

     dPrint(1,"size %d", iAudioBuffer.size());
    if(iAudioBuffer.size() > 0){
      ownMutex_Lock(iAudioBufferMutex);      
      dPrint(10,"front");
      playingContainer->Reset();
      char *buffer;
      unsigned int size;
      CAudioData *data = iAudioBuffer.front();
      data->GetAudio(&buffer,&size);

      playingContainer->SetAudioData((const unsigned char *)buffer, 
                                     size,
                                     audioInfo,
                                     (EAudioDataType)audioInfo.audiodatatype,
                                     (EAudioDataType)audioInfo.audiodatatype);
      
      dPrint(10,"pop");
      delete data;
      iAudioBuffer.pop();
      dPrint(10,"popped");
      ownMutex_Unlock(iAudioBufferMutex); 
    }
    
    
    if(playingContainer->GetAudioDataPtr()){
      dPrint(1,"playing...%d",audioInfo.numberOfFrames);
      alsa.PlayAudio((char *)playingContainer->GetAudioDataPtr(),audioInfo.numberOfFrames);
      dPrint(1,"played...");
    }else{
      ownSleep_ms(10);
    }
    
  
    
    
  }
  return 0;    


}

//*****************************************************************************
//*****************************************************************************
int main(int argc, char *argv[]) 
{
  // GIMnet parameters
  std::string gimnetAP = "asrobo.hut.fi";
  int gimnetAPPort = 40002;
  std::string gimnetName;


  // setup signal handling
  InitSignalHandler();

  // Objects
  gimi::GIMI g;

  // Init Debug lib
  debugInit();
  debugSetGlobalDebugLvl(4);
  const std::string logfile = std::string(argv[0]) + ".log";
  debugSetLogFilename(logfile.c_str());

  // Greet
  fprintf(stderr,
	  "\n%s - $Revision: 1.2 $\n", argv[0]);

  /////////////////////////////////////////////////////////////////////////////
  // Parse parameters - Remember: ** DO NOT MODIFY OR DELETE ANY OF THIS **
  // _Add_ anything as you wish.
  ///////////////////////////////////////////////////////////////////////////// 
  bool parse = true;
  while(parse) {
    int c;
    c = getopt(argc, argv, "n:u:p:s:S:hqv");
    switch(c) {

      /////////////////////////////////
      ////// Application specific /////
      /////////////////////////////////
  
    case 's':
      datasource = optarg;
      dPrint(3,"Using DataSource '%s'", optarg);
      break;

    case 'S':
      datasourceMaCISL = optarg;
      dPrint(3,"Using DataSource MaCISL '%s'", optarg);
      break;

    
      /////////////////////////////////////////////////////////////////////////
      /// Add here anything you need.
      /////////////////////////////////////////////////////////////////////////

      /////////////////////////////////
      ///// MaCI/GIMnet parameters ////
      /////////////////////////////////
    case 'n':
      gimnetName = optarg;
      dPrint(3,"Using GIMnet Name '%s'", optarg);
      break;

    case 'u':
      gimnetAP = optarg;
      dPrint(3,"Using GIMnetAP address '%s'", optarg);
      break;

    case 'p':
      gimnetAPPort = atoi(optarg);
      dPrint(3,"Using GIMnetAP port '%d'", gimnetAPPort);
      break;

      //////////////////////////////////
      //// GENERIC:                 ////
      //////////////////////////////////
    case 'v':
      // Increase only if not previously set to 0 (by 'quiet')
      if (verbose > 0)
	debugSetGlobalDebugLvl(++verbose);
      break;
      
    case 'q':
      verbose = 0;
      debugSetGlobalDebugLvl(0);
      break;
      
    case 'h':
    case '?':
      showUsage();
      exit(1);
      break;
      
    case -1:
      parse = false;
      break;
    }
  }
  
  /////////////////////////////////////////////////////////////////////////////
  // Execute connection to GIMnet.
  /////////////////////////////////////////////////////////////////////////////
  int r;
  if ( (r = g.connectToHubEx(gimnetAP, gimnetAPPort, gimnetName) ) != GIMI_OK) {
    dPrint(1,"Failed to connect to GIMnet AccessPoint '%s:%d' with name '%s': '%s'",
	   gimnetAP.c_str(), 
	   gimnetAPPort, 
	   gimnetName.size()?gimnetName.c_str():"<anonymous>",
	   gimi::getGimiErrorString(r).c_str());
    
  } else {
    dPrint(2,"Succesfully connected to GIMnet at AccessPoint '%s:%d' with name '%s': '%s'",
	   gimnetAP.c_str(), 
	   gimnetAPPort, 
	   gimnetName.size()?gimnetName.c_str():"<anonymous>",
	   gimi::getGimiErrorString(r).c_str());

    dPrint(1,"gimi ptr %p, is connected %d",&g,g.isConnected());
      // GIMnet connection OK, now execute module.
      r = ExecuteExampleClient(g);
  }


  return 0;
}
//*****************************************************************************
//*****************************************************************************
